home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 13 / AMIGAplus Sonderheft 13 (1998)(ICP)(DE)[!].iso / rexx / play.m2i < prev    next >
Text File  |  1997-11-18  |  175b  |  18 lines
  1. /* playing a sound */
  2.  
  3. OPTION RESULTS
  4. ADDRESS "M2IPort.Rexx"
  5.  
  6. SOUND="sounds/test.snd"
  7.  
  8.  sound on
  9.  PIPO=RC
  10.  
  11.  playfile "'"SOUND"'"
  12.  
  13.  IF PIPO~=5 THEN DO
  14.     sound off
  15.  END
  16.  
  17. EXIT
  18.